home *** CD-ROM | disk | FTP | other *** search
-
- ; HLink Applicatino Transmission Script
- ; Octamed - script
-
-
- if exists work:applic/octamed
-
- else
- ;remove rest of Octamed from the system
- cd work:applic
- del octamed
- del octamedplayer
- del ray.b-f.gfx#?
- del med_paths
- del octamed.config
-
- ;archive remote Octamed stuff
- echo "lha a d:Octamed.Lha dh1:music/Octamed" >> hl:execute
- echo "lha a d:Octamed.Lha dh1:music/Octamedplayer" >> hl:execute
- echo "lha a d:Octamed.Lha dh1:music/RAY.B-F.gfx#?" >> hl:execute
- echo "lha a d:Octamed.lha s:med_paths" >> hl:execute
- echo "lha a d:Octamed.lha s:octamed.config" >> hl:execute
-
-
- ;Receive Octamed archive
- echo "chd d:" >> hl:execute
- wait 1
- echo "#send d:Octamed.lha" >> hl:execute
-
- ;Wait for receiving octamed archive
- del d:octamed.lha
- lab LOOP
- if exists d:octamed.lha
- else
- skip LOOP back
- endif
-
- wait 1
- echo "Goinging..."
- wait 1
- echo "Unpacking Application... "
- wait 1
- lha x -T d:octamed.lha work:applic/
- wait 4
-
- endif
-
- cd work:applic
- run > nil: work:applic/octamed
- del d:octamed.lha
-
-
-
-
-
-
-
-